From: Gerd Moellmann <gerd@gnu.org>
Date: Mon, 30 Apr 2001 14:57:35 +0000 (+0000)
Subject: (Fprimitive_undo): In a writable buffer, enable undoing
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~40511
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=5ee7dc94344d784ce0f0fa912bd38d90c17ba850;p=emacs.git

(Fprimitive_undo): In a writable buffer, enable undoing
read-only text that is so because of text properties.
---

diff --git a/src/undo.c b/src/undo.c
index d2a5590a193..83c2327a8db 100644
--- a/src/undo.c
+++ b/src/undo.c
@@ -412,8 +412,9 @@ Return what remains of the list.")
   next = Qnil;
   GCPRO2 (next, list);
 
-  /* Don't let read-only properties interfere with undo.  */
-  if (!NILP (current_buffer->read_only))
+  /* In a writable buffer, enable undoing read-only text that is so
+     because of text properties.  */
+  if (NILP (current_buffer->read_only))
     specbind (Qinhibit_read_only, Qt);
 
   /* Don't let `intangible' properties interfere with undo.  */